﻿Public Class ven_ingrese_manual_propmat
    Private Sub btn_ok_ven_ingrese_manual_propmat_Click(sender As Object, e As EventArgs) Handles btn_ok_ven_ingrese_manual_propmat.Click
        If txtSf.Text = "" Or txtSu.Text = "" Or txtSa.Text = "" Then
            MsgBox("Ingrese los valores de las propiedades mecánicas")
        Else
            sf = Convert.ToInt32(txtSf.Text)
            su = Convert.ToInt32(txtSu.Text)
            sa = Convert.ToInt32(txtSa.Text)
            Me.Close()
        End If
    End Sub
End Class